projects
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
e444cfe
)
(remove, remq): Remove.
author
Dave Love
<fx@gnu.org>
Fri, 5 Jan 2001 16:39:40 +0000
(16:39 +0000)
committer
Dave Love
<fx@gnu.org>
Fri, 5 Jan 2001 16:39:40 +0000
(16:39 +0000)
lisp/emacs-lisp/cl-seq.el
patch
|
blob
|
history
diff --git
a/lisp/emacs-lisp/cl-seq.el
b/lisp/emacs-lisp/cl-seq.el
index 90fba3cfe3ab2a87b49d04289e1bded84e183890..bea91dc309895618ff68c711329af0f372ec1594 100644
(file)
--- a/
lisp/emacs-lisp/cl-seq.el
+++ b/
lisp/emacs-lisp/cl-seq.el
@@
-322,9
+322,6
@@
This is a destructive function; it reuses the storage of SEQ whenever possible.
Keywords supported: :key :count :start :end :from-end"
(apply 'delete* nil cl-list :if-not cl-pred cl-keys))
-(defun remove (x y) (remove* x y :test 'equal))
-(defun remq (x y) (if (memq x y) (delq x (copy-list y)) y))
-
(defun remove-duplicates (cl-seq &rest cl-keys)
"Return a copy of SEQ with all duplicate elements removed.
Keywords supported: :test :test-not :key :start :end :from-end"